home *** CD-ROM | disk | FTP | other *** search
/ Apple WWDC 1996 / WWDC96_1996 (CD).toast / Technology Materials / MacOS 8 Resources / Developer Tools / Mac OS 8 Interfaces & Libraries / Interfaces / AIncludes / NumberFormatting.a < prev    next >
Encoding:
Text File  |  1996-05-01  |  16.1 KB  |  520 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        NumberFormatting.a
  3. ;
  4. ;    Version:    Technology:    8.0
  5. ;                Release:    Universal Interfaces 3.0d3 on Copland DR1
  6. ;
  7. ;    Copyright:    © 1984-1996 by Apple Computer, Inc.  All rights reserved.
  8. ;
  9. ;    Bugs?:        If you find a problem with this file, send the file and version
  10. ;                information (from above) and the problem description to:
  11. ;
  12. ;                    Internet:    apple.bugs@applelink.apple.com
  13. ;                    AppleLink:    APPLE.BUGS
  14. ;
  15. ;
  16.     IF &TYPE('__NUMBERFORMATTING__') = 'UNDEFINED' THEN
  17. __NUMBERFORMATTING__ SET 1
  18.  
  19.     IF &TYPE('__CONDITIONALMACROS__') = 'UNDEFINED' THEN
  20.     include 'ConditionalMacros.a'
  21.     ENDIF
  22.     IF &TYPE('__TYPES__') = 'UNDEFINED' THEN
  23.     include 'Types.a'
  24.     ENDIF
  25.     IF FOR_SYSTEM8_PREEMPTIVE THEN
  26.     IF &TYPE('__TEXTOBJECTS__') = 'UNDEFINED' THEN
  27.     include 'TextObjects.a'
  28.     ENDIF
  29.     IF &TYPE('__TEXTCOMMON__') = 'UNDEFINED' THEN
  30.     include 'TextCommon.a'
  31.     ENDIF
  32.     IF &TYPE('__LOCALEOBJECTS__') = 'UNDEFINED' THEN
  33.     include 'LocaleObjects.a'
  34.     ENDIF
  35.     IF &TYPE('__TEXTPARSER__') = 'UNDEFINED' THEN
  36.     include 'TextParser.a'
  37.     ENDIF
  38.     ENDIF
  39.     IF FOR_SYSTEM7_AND_SYSTEM8_COOPERATIVE THEN
  40.     IF &TYPE('__INTLRESOURCES__') = 'UNDEFINED' THEN
  41.     include 'IntlResources.a'
  42.     ENDIF
  43.     ENDIF
  44. ;
  45. ;
  46. ;    Here are the current System 7 routine names and the translations to the older forms.
  47. ;    Please use the newer forms in all new code and migrate the older names out of existing
  48. ;    code as maintainance permits.
  49. ;    
  50. ;    New Name                    Old Name(s)
  51. ;    
  52. ;    ExtendedToString            FormatX2Str
  53. ;    FormatRecToString            Format2Str
  54. ;    NumToString                
  55. ;    StringToExtended            FormatStr2X
  56. ;    StringToFormatRec            Str2Format
  57. ;    StringToNum                
  58. ;
  59. ;
  60.     IF FOR_SYSTEM7_AND_SYSTEM8_PREEMPTIVE THEN
  61. NumFormatString            RECORD 0
  62. fLength                     ds.b    1                ; offset: $0 (0)
  63. fVersion                 ds.b    1                ; offset: $1 (1)
  64. data                     ds.b    254                ; offset: $2 (2)        ;  private data 
  65. sizeof                     EQU *                    ; size:   $100 (256)
  66.                         ENDR
  67. NumFormatStringRec        RECORD 0
  68. f                         ds        NumFormatString
  69. sizeof                     EQU *                    ; size:   $100 (256)
  70.                         ENDR
  71.  
  72.  
  73.     ENDIF
  74.     IF FOR_SYSTEM7_AND_SYSTEM8_COOPERATIVE THEN
  75. ; typedef short                         FormatStatus
  76.  
  77.  
  78. fVNumber                        EQU        0                    ; first version of NumFormatString 
  79. ; typedef SInt8                         FormatClass
  80.  
  81.  
  82. fPositive                        EQU        0
  83. fNegative                        EQU        1
  84. fZero                            EQU        2
  85. ; typedef SInt8                         FormatResultType
  86.  
  87.  
  88. fFormatOK                        EQU        0
  89. fBestGuess                        EQU        1
  90. fOutOfSynch                        EQU        2
  91. fSpuriousChars                    EQU        3
  92. fMissingDelimiter                EQU        4
  93. fExtraDecimal                    EQU        5
  94. fMissingLiteral                    EQU        6
  95. fExtraExp                        EQU        7
  96. fFormatOverflow                    EQU        8
  97. fFormStrIsNAN                    EQU        9
  98. fBadPartsTable                    EQU        10
  99. fExtraPercent                    EQU        11
  100. fExtraSeparator                    EQU        12
  101. fEmptyFormatString                EQU        13
  102. FVector                    RECORD 0
  103. start                     ds.w    1                ; offset: $0 (0)
  104. length                     ds.w    1                ; offset: $2 (2)
  105. sizeof                     EQU *                    ; size:   $4 (4)
  106.                         ENDR
  107. ;  index by [fPositive..fZero] 
  108. TripleInt                RECORD 0
  109. elements                 ds.b    3 * FVector.sizeof
  110. sizeof                     EQU *                    ; size:   $C (12)
  111.                         ENDR
  112.  
  113.  
  114.     ENDIF
  115.     IF FOR_SYSTEM7_AND_SYSTEM8_PREEMPTIVE THEN
  116. ;
  117. ; pascal void StringToNum(ConstStr255Param theString, long *theNum)
  118. ;
  119.     IF ¬ GENERATINGCFM THEN
  120.         Macro
  121.         _StringToNum
  122.             move.w              #$0001,-(sp)
  123.             dc.w                $A9EE
  124.         EndM
  125.     ELSE
  126.         IMPORT_CFM_FUNCTION StringToNum
  127.     ENDIF
  128.  
  129. ;
  130. ; pascal void NumToString(long theNum, Str255 theString)
  131. ;
  132.     IF ¬ GENERATINGCFM THEN
  133.         Macro
  134.         _NumToString
  135.             move.w              #$0000,-(sp)
  136.             dc.w                $A9EE
  137.         EndM
  138.     ELSE
  139.         IMPORT_CFM_FUNCTION NumToString
  140.     ENDIF
  141.  
  142.     ENDIF
  143.     IF FOR_SYSTEM7_AND_SYSTEM8_COOPERATIVE THEN
  144. ;
  145. ; pascal FormatStatus ExtendedToString(extended80 *x, const NumFormatString *myCanonical, const NumberParts *partsTable, Str255 outString)
  146. ;
  147.     IF ¬ GENERATINGCFM THEN
  148.         Macro
  149.         _ExtendedToString
  150.             move.l              #$8210FFE8,-(sp)
  151.             dc.w                $A8B5
  152.         EndM
  153.     ELSE
  154.         IMPORT_CFM_FUNCTION ExtendedToString
  155.     ENDIF
  156.  
  157. ;
  158. ; pascal FormatStatus StringToExtended(ConstStr255Param source, const NumFormatString *myCanonical, const NumberParts *partsTable, extended80 *x)
  159. ;
  160.     IF ¬ GENERATINGCFM THEN
  161.         Macro
  162.         _StringToExtended
  163.             move.l              #$8210FFE6,-(sp)
  164.             dc.w                $A8B5
  165.         EndM
  166.     ELSE
  167.         IMPORT_CFM_FUNCTION StringToExtended
  168.     ENDIF
  169.  
  170. ;
  171. ; pascal FormatStatus StringToFormatRec(ConstStr255Param inString, const NumberParts *partsTable, NumFormatString *outString)
  172. ;
  173.     IF ¬ GENERATINGCFM THEN
  174.         Macro
  175.         _StringToFormatRec
  176.             move.l              #$820CFFEC,-(sp)
  177.             dc.w                $A8B5
  178.         EndM
  179.     ELSE
  180.         IMPORT_CFM_FUNCTION StringToFormatRec
  181.     ENDIF
  182.  
  183. ;
  184. ; pascal FormatStatus FormatRecToString(const NumFormatString *myCanonical, const NumberParts *partsTable, Str255 outString, TripleInt positions)
  185. ;
  186.     IF ¬ GENERATINGCFM THEN
  187.         Macro
  188.         _FormatRecToString
  189.             move.l              #$8210FFEA,-(sp)
  190.             dc.w                $A8B5
  191.         EndM
  192.     ELSE
  193.         IMPORT_CFM_FUNCTION FormatRecToString
  194.     ENDIF
  195.  
  196.     ENDIF
  197.     IF OLDROUTINENAMES THEN
  198.     IF FOR_SYSTEM7_AND_SYSTEM8_DEPRECATED THEN
  199.     ENDIF
  200. ;  FOR_SYSTEM7_AND_SYSTEM8_DEPRECATED
  201.     ENDIF
  202. ;  OLDROUTINENAMES
  203.     IF FOR_SYSTEM8_PREEMPTIVE THEN
  204. ; typedef LocaleObjectRef                 LocaleNumberFormatterObjectRef
  205.  
  206. ; typedef OptionBits                     NumberFormatterOptionBits
  207.  
  208. ; typedef UInt32                         NumberFormatterTokenID
  209.  
  210. FIndexVector            RECORD 0
  211. startIndex                 ds.l    1                ; offset: $0 (0)
  212. endIndex                 ds.l    1                ; offset: $4 (4)
  213. sizeof                     EQU *                    ; size:   $8 (8)
  214.                         ENDR
  215. ;  index by [fPositive..fZero] 
  216. TripleIndex                RECORD 0
  217. elements                 ds.b    3 * FIndexVector.sizeof
  218. sizeof                     EQU *                    ; size:   $18 (24)
  219.                         ENDR
  220.  
  221.  
  222.  
  223.                                                             ;NumberFormatterOptionBits
  224. kDontUseThousandSeparatorBit    EQU        0
  225. kIsScientificFormatBit            EQU        1
  226. kIsPercentageFormatBit            EQU        2
  227. kIsCurrencyFormatBit            EQU        3
  228. kIsFractionCurrencyFormatBit    EQU        4
  229. kIsLongFormCurrencyFormatBit    EQU        5
  230. kOmitDecimalPointInCurrencyFormatBit EQU 6
  231. kUseAsciiDigitBit                EQU        7
  232. kUseNegativePosfixPrefixBit        EQU        8
  233.  
  234.                                                             ;NumberFormatterOptionBits
  235. kStandardFormatMask                EQU        0
  236. kDontUseThousandSeparatorMask    EQU        $00000001
  237. kIsScientificFormatMask            EQU        $00000002
  238. kIsPercentageFormatMask            EQU        $00000004
  239. kIsCurrencyFormatMask            EQU        $00000008
  240. kIsFractionCurrencyFormatMask    EQU        $00000010
  241. kIsLongFormCurrencyFormatMask    EQU        $00000020
  242. kOmitDecimalPointInCurrencyFormatMask EQU $00000040
  243. kUseAsciiDigitMask                EQU        $00000080
  244. kUseNegativePosfixPrefixMask    EQU        $00000100
  245. ;
  246. ; extern OSStatus GetNumberFormatterObjectFromRef(LocaleRef locale, LocaleNumberFormatterObjectRef *numberFormatterObject)
  247. ;
  248.     IF GENERATINGCFM THEN
  249.         IMPORT_CFM_FUNCTION GetNumberFormatterObjectFromRef
  250.     ENDIF
  251.  
  252. ;
  253. ; extern OSStatus GetNumberFormatterObjectFromID(LocaleIdentifier localeID, LocaleNumberFormatterObjectRef *numberFormatterObject)
  254. ;
  255.     IF GENERATINGCFM THEN
  256.         IMPORT_CFM_FUNCTION GetNumberFormatterObjectFromID
  257.     ENDIF
  258.  
  259. ;
  260. ; extern OSStatus GetCurrentNumberFormatterObject(LocaleNumberFormatterObjectRef *numberFormatterObject)
  261. ;
  262.     IF GENERATINGCFM THEN
  263.         IMPORT_CFM_FUNCTION GetCurrentNumberFormatterObject
  264.     ENDIF
  265.  
  266. ;
  267. ; extern OSStatus GetNumberFormatterObjectInfo(LocaleNumberFormatterObjectRef numberFormatterObject, TextEncoding *theEncoding, LocaleIdentifier *theLocaleIdentifier)
  268. ;
  269.     IF GENERATINGCFM THEN
  270.         IMPORT_CFM_FUNCTION GetNumberFormatterObjectInfo
  271.     ENDIF
  272.  
  273. ;
  274. ; extern OSStatus ConvertUInt32ToTextObject(UInt32 theUInt32, LocaleNumberFormatterObjectRef numberFormatterObject, NumberFormatterOptionBits options, TextObject theTextObject, TextObjectIndex startReplaceIndex, TextObjectIndex endReplaceIndex)
  275. ;
  276.     IF GENERATINGCFM THEN
  277.         IMPORT_CFM_FUNCTION ConvertUInt32ToTextObject
  278.     ENDIF
  279.  
  280. ;
  281. ; extern OSStatus ConvertSInt32ToTextObject(SInt32 theSInt32, LocaleNumberFormatterObjectRef numberFormatterObject, NumberFormatterOptionBits options, TextObject theTextObject, TextObjectIndex startReplaceIndex, TextObjectIndex endReplaceIndex)
  282. ;
  283.     IF GENERATINGCFM THEN
  284.         IMPORT_CFM_FUNCTION ConvertSInt32ToTextObject
  285.     ENDIF
  286.  
  287. ;
  288. ; extern OSStatus ConvertUInt64ToTextObject(UInt64 theUInt64, LocaleNumberFormatterObjectRef numberFormatterObject, NumberFormatterOptionBits options, TextObject theTextObject, TextObjectIndex startReplaceIndex, TextObjectIndex endReplaceIndex)
  289. ;
  290.     IF GENERATINGCFM THEN
  291.         IMPORT_CFM_FUNCTION ConvertUInt64ToTextObject
  292.     ENDIF
  293.  
  294. ;
  295. ; extern OSStatus ConvertSInt64ToTextObject(SInt64 theSInt64, LocaleNumberFormatterObjectRef numberFormatterObject, NumberFormatterOptionBits options, TextObject theTextObject, TextObjectIndex startReplaceIndex, TextObjectIndex endReplaceIndex)
  296. ;
  297.     IF GENERATINGCFM THEN
  298.         IMPORT_CFM_FUNCTION ConvertSInt64ToTextObject
  299.     ENDIF
  300.  
  301. ;
  302. ; extern OSStatus ConvertDoubleToTextObject(double theDouble, LocaleNumberFormatterObjectRef numberFormatterObject, NumberFormatterOptionBits options, SInt8 precision, TextObject theTextObj, TextObjectIndex startReplaceIndex, TextObjectIndex endReplaceIndex)
  303. ;
  304.     IF GENERATINGCFM THEN
  305.         IMPORT_CFM_FUNCTION ConvertDoubleToTextObject
  306.     ENDIF
  307.  
  308. ;
  309. ; extern OSStatus ConvertTextObjectToUInt32(ConstTextObject textObject, LocaleNumberFormatterObjectRef numberFormatterObject, NumberFormatterOptionBits options, TextObjectIndex startIndex, TextObjectIndex endIndex, UInt32 *theUInt32)
  310. ;
  311.     IF GENERATINGCFM THEN
  312.         IMPORT_CFM_FUNCTION ConvertTextObjectToUInt32
  313.     ENDIF
  314.  
  315. ;
  316. ; extern OSStatus ConvertTextObjectToSInt32(ConstTextObject textObject, LocaleNumberFormatterObjectRef numberFormatterObject, NumberFormatterOptionBits options, TextObjectIndex startIndex, TextObjectIndex endIndex, SInt32 *theSInt32)
  317. ;
  318.     IF GENERATINGCFM THEN
  319.         IMPORT_CFM_FUNCTION ConvertTextObjectToSInt32
  320.     ENDIF
  321.  
  322. ;
  323. ; extern OSStatus ConvertTextObjectToUInt64(ConstTextObject textObject, LocaleNumberFormatterObjectRef numberFormatterObject, NumberFormatterOptionBits options, TextObjectIndex startIndex, TextObjectIndex endIndex, UInt64 *theUInt64)
  324. ;
  325.     IF GENERATINGCFM THEN
  326.         IMPORT_CFM_FUNCTION ConvertTextObjectToUInt64
  327.     ENDIF
  328.  
  329. ;
  330. ; extern OSStatus ConvertTextObjectToSInt64(ConstTextObject textObject, LocaleNumberFormatterObjectRef numberFormatterObject, NumberFormatterOptionBits options, TextObjectIndex startIndex, TextObjectIndex endIndex, SInt64 *theSInt64)
  331. ;
  332.     IF GENERATINGCFM THEN
  333.         IMPORT_CFM_FUNCTION ConvertTextObjectToSInt64
  334.     ENDIF
  335.  
  336. ;
  337. ; extern OSStatus ConvertTextObjectToDouble(ConstTextObject textObject, LocaleNumberFormatterObjectRef localeObjectRef, TextObjectIndex startIndex, TextObjectIndex endIndex, double *theDouble)
  338. ;
  339.     IF GENERATINGCFM THEN
  340.         IMPORT_CFM_FUNCTION ConvertTextObjectToDouble
  341.     ENDIF
  342.  
  343. ;
  344. ; extern OSStatus FormattedTextObjectToDouble(ConstTextObject textObject, LocaleNumberFormatterObjectRef ref, TextObjectIndex startIndex, TextObjectIndex endIndex, const NumFormatString *myCanonical, const double *num)
  345. ;
  346.     IF GENERATINGCFM THEN
  347.         IMPORT_CFM_FUNCTION FormattedTextObjectToDouble
  348.     ENDIF
  349.  
  350. ;
  351. ; extern OSStatus DoubleToFormattedTextObject(double *num, LocaleNumberFormatterObjectRef ref, const NumFormatString *myCanonical, TextObject outTextObject)
  352. ;
  353.     IF GENERATINGCFM THEN
  354.         IMPORT_CFM_FUNCTION DoubleToFormattedTextObject
  355.     ENDIF
  356.  
  357. ;
  358. ; extern OSStatus TextObjectToFormatRec(ConstTextObject textObject, LocaleNumberFormatterObjectRef ref, TextObjectIndex startIndex, TextObjectIndex endIndex, NumFormatString *outString)
  359. ;
  360.     IF GENERATINGCFM THEN
  361.         IMPORT_CFM_FUNCTION TextObjectToFormatRec
  362.     ENDIF
  363.  
  364. ;
  365. ; extern OSStatus FormatRecToTextObject(const NumFormatString *myCanonical, LocaleNumberFormatterObjectRef ref, TextObject outTextObject, TripleIndex positions)
  366. ;
  367.     IF GENERATINGCFM THEN
  368.         IMPORT_CFM_FUNCTION FormatRecToTextObject
  369.     ENDIF
  370.  
  371.  
  372.                                                             ; NumberFormatterTokenID
  373. kNumFmtCharLeftQuote            EQU        0                    ;(begin literal)
  374. kNumFmtCharRightQuote            EQU        1                    ;(end literal)
  375. kNumFmtCharLeadPlacer            EQU        2                    ; (‘^’ in U.S)
  376. kNumFmtCharLeader                EQU        3                    ;(non-breakable space in U.S)
  377. kNumFmtCharNonLeader            EQU        4                    ;(# sign in U.S)
  378. kNumFmtCharZeroLead                EQU        5                    ;(digit ‘0’ in U.S)
  379. kNumFmtCharCurrencyPlacer        EQU        6                    ; (‘$’ in U.S)
  380. kNumFmtCharPercent                EQU        7                    ; (‘%’) 
  381. kNumFmtCharPlusSign                EQU        8                    ; (‘+’)
  382. kNumFmtCharMinusSign            EQU        9                    ; (‘-’) 
  383. kNumFmtCharThousandSep            EQU        10                    ; (‘,’) 
  384. kNumFmtCharFormatSeparator        EQU        11                    ; (‘;’) 
  385. kNumFmtCharEscape                EQU        12                    ;  (‘\’) 
  386. kNumFmtCharDecPoint                EQU        13                    ; (‘.’) 
  387. kNumFmtTextpePlus                EQU        14                    ; (‘E+’) 
  388. kNumFmtTextpeMinus                EQU        15                    ; (‘E-’) 
  389. kNumFmtTextMinusPlus            EQU        16                    ; (‘E’) 
  390. kNumFmtTextFirstRangeCurrencyForm EQU    17                    ; (‘Dollar’) 
  391. kNumFmtTextSecondRangeCurrencyForm EQU    18                    ; (‘Dollar(s)’) 
  392. kNumFmtTextPluralCurrency        EQU        19                    ; (‘Dollar(s)’) 
  393. kNumFmtTextfractionCurrency        EQU        20                    ; (‘cents)) 
  394. kNumFmtTextCurrencyAbbreviated    EQU        21                    ; (‘$’) 
  395. kNumFmtTextfractionCurrencyAbbreviated EQU 22                ; (‘¢’) 
  396. kNumFmtTextNegativePrefix        EQU        23                    ; (‘(‘) 
  397. kNumFmtTextNegativePostfix        EQU        24                    ; (‘)’) 
  398. ; typedef UInt32                         CurrencyPosition
  399.  
  400.  
  401.                                                             ;CurrencyPosition
  402. kAtTheBeginning                    EQU        0
  403. kAtDecimalPointPosition            EQU        1
  404. kAtTheEnd                        EQU        2
  405. ;
  406. ; extern OSStatus CreateCustomNumberFormatLocaleObject(LocaleNumberFormatterObjectRef numberFormatterObject, LocaleNumberFormatterObjectRef *customNumberFormatterObject)
  407. ;
  408.     IF GENERATINGCFM THEN
  409.         IMPORT_CFM_FUNCTION CreateCustomNumberFormatLocaleObject
  410.     ENDIF
  411.  
  412. ;
  413. ; extern OSStatus DeleteCustomNumberFormatLocaleObject(LocaleNumberFormatterObjectRef customNumberFormatterObject)
  414. ;
  415.     IF GENERATINGCFM THEN
  416.         IMPORT_CFM_FUNCTION DeleteCustomNumberFormatLocaleObject
  417.     ENDIF
  418.  
  419. ;
  420. ; extern OSStatus SetNumFmtTokenToParserToken(LocaleNumberFormatterObjectRef customNumberFormatterObject, NumberFormatterTokenID tokenID, BasicToken theToken)
  421. ;
  422.     IF GENERATINGCFM THEN
  423.         IMPORT_CFM_FUNCTION SetNumFmtTokenToParserToken
  424.     ENDIF
  425.  
  426. ;
  427. ; extern OSStatus GetParserTokenFromNumFmtToken(LocaleNumberFormatterObjectRef customNumberFormatterObject, NumberFormatterTokenID tokenID, BasicToken *theToken)
  428. ;
  429.     IF GENERATINGCFM THEN
  430.         IMPORT_CFM_FUNCTION GetParserTokenFromNumFmtToken
  431.     ENDIF
  432.  
  433. ;
  434. ; extern OSStatus GetNumberFormatterTextFromToken(LocaleNumberFormatterObjectRef customNumberFormatterObject, NumberFormatterTokenID tokenID, TextObject theTextObject)
  435. ;
  436.     IF GENERATINGCFM THEN
  437.         IMPORT_CFM_FUNCTION GetNumberFormatterTextFromToken
  438.     ENDIF
  439.  
  440. ;
  441. ; extern OSStatus SetNumFmtTokenToText(LocaleNumberFormatterObjectRef customNumberFormatterObject, NumberFormatterTokenID tokenID, ConstTextObject theTextObject)
  442. ;
  443.     IF GENERATINGCFM THEN
  444.         IMPORT_CFM_FUNCTION SetNumFmtTokenToText
  445.     ENDIF
  446.  
  447. ;
  448. ; extern OSStatus GetLocaleLongCurrencyPosition(LocaleNumberFormatterObjectRef customNumberFormatterObject, CurrencyPosition *position)
  449. ;
  450.     IF GENERATINGCFM THEN
  451.         IMPORT_CFM_FUNCTION GetLocaleLongCurrencyPosition
  452.     ENDIF
  453.  
  454. ;
  455. ; extern OSStatus SetLocaleLongCurrencyPosition(LocaleNumberFormatterObjectRef customNumberFormatterObject, CurrencyPosition position)
  456. ;
  457.     IF GENERATINGCFM THEN
  458.         IMPORT_CFM_FUNCTION SetLocaleLongCurrencyPosition
  459.     ENDIF
  460.  
  461. ;
  462. ; extern OSStatus GetLocaleAbbrevCurrencyPosition(LocaleNumberFormatterObjectRef customNumberFormatterObject, CurrencyPosition *position)
  463. ;
  464.     IF GENERATINGCFM THEN
  465.         IMPORT_CFM_FUNCTION GetLocaleAbbrevCurrencyPosition
  466.     ENDIF
  467.  
  468. ;
  469. ; extern OSStatus SetLocaleAbbrevCurrencyPosition(LocaleNumberFormatterObjectRef customNumberFormatterObject, CurrencyPosition position)
  470. ;
  471.     IF GENERATINGCFM THEN
  472.         IMPORT_CFM_FUNCTION SetLocaleAbbrevCurrencyPosition
  473.     ENDIF
  474.  
  475. ;
  476. ; extern OSStatus GetLocaleFirstRangeCurrency(LocaleNumberFormatterObjectRef customNumberFormatterObject, UInt32 *maxValueInRange)
  477. ;
  478.     IF GENERATINGCFM THEN
  479.         IMPORT_CFM_FUNCTION GetLocaleFirstRangeCurrency
  480.     ENDIF
  481.  
  482. ;
  483. ; extern OSStatus SetLocaleFirstRangeCurrency(LocaleNumberFormatterObjectRef customNumberFormatterObject, UInt32 maxValueInRange)
  484. ;
  485.     IF GENERATINGCFM THEN
  486.         IMPORT_CFM_FUNCTION SetLocaleFirstRangeCurrency
  487.     ENDIF
  488.  
  489. ;
  490. ; extern OSStatus GetLocaleSecondRangeCurrency(LocaleNumberFormatterObjectRef customNumberFormatterObject, UInt32 *maxValueInRange)
  491. ;
  492.     IF GENERATINGCFM THEN
  493.         IMPORT_CFM_FUNCTION GetLocaleSecondRangeCurrency
  494.     ENDIF
  495.  
  496. ;
  497. ; extern OSStatus SetLocaleSecondRangeCurrency(LocaleNumberFormatterObjectRef customNumberFormatterObject, UInt32 maxValueInRange)
  498. ;
  499.     IF GENERATINGCFM THEN
  500.         IMPORT_CFM_FUNCTION SetLocaleSecondRangeCurrency
  501.     ENDIF
  502.  
  503. ;
  504. ; extern OSStatus GetLocaleDigitText(LocaleNumberFormatterObjectRef customNumberFormatterObject, UInt8 theDigit, TextObject theTextObject)
  505. ;
  506.     IF GENERATINGCFM THEN
  507.         IMPORT_CFM_FUNCTION GetLocaleDigitText
  508.     ENDIF
  509.  
  510. ;
  511. ; extern OSStatus SetLocaleDigitText(LocaleNumberFormatterObjectRef customNumberFormatterObject, UInt8 theDigit, TextObject theTextObject)
  512. ;
  513.     IF GENERATINGCFM THEN
  514.         IMPORT_CFM_FUNCTION SetLocaleDigitText
  515.     ENDIF
  516.  
  517.     ENDIF
  518.     ENDIF ; __NUMBERFORMATTING__ 
  519.  
  520.